home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 30
/
Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso
/
Aminet
/
util
/
boot
/
selector90.lha
/
Selector
/
pref
/
chooseguide
< prev
next >
Wrap
Text File
|
1998-07-19
|
388b
|
19 lines
if not exists env:selectorGuideReader
setenv selectorGuideReader sys:utilities/multiview
endif
filename >env:dd -pathonly $selectorGuideReader
filename >env:ff -nopath $selectorGuideReader
requestfile >env:selguidebak title "Choose Guide Reader" drawer $dd file $ff
if not warn
copy >nil: env:selguidebak env:selectorGuideReader
endif
unsetenv dd
unsetenv ff
unsetenv selguidebak